home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 3
/
Cream of the Crop 3.iso
/
clipper
/
ks94an.zip
/
UNDERLN.HDR
< prev
next >
Wrap
Text File
|
1994-04-25
|
1KB
|
43 lines
/******************************************************************************
The Klipper Library, for CA-Clipper 5.x
Copyright (c), 1994, Wallace Information Systems Engineering
FUNCTION:
_Underline( cWhat ) --> cString
PARAMETERS:
cWhat : String to print and then underline
SHORT:
Underline print data as it is sent to the printer.
DESCRIPTION:
_Underline() is a printing function that prints its text string parameter
and then backs up and underlines it.
This is actually done in reverse order. The @ Say statement must have
an argument to avoid a run-time error. Thus, this function returns writes
the underline to the length of the text parameter and then returns
that parameter to satisfy the needs of the @ SAY statement.
NOTE:
If combined with the _Bold() function, the _Bold() function must contain
the _Underline() function:
@ prow(),pcol() say _Bold(_Underline('BOLD AND UNDERLINED'))
This causes the Bold to be printed, returning the original parameter
to _Underline() which underlines, which in turn returns the original
parameter to satisfy the @ SAY statement.
EXAMPLE:
@ PROW(),PCOL() SAY _Underline('THIS IS UNDERLINED')
******************************************************************************/